\(\int \frac {x^2 (a+b \text {sech}^{-1}(c x))}{(d+e x^2)^3} \, dx\) [128]

   Optimal result
   Rubi [A] (verified)
   Mathematica [C] (warning: unable to verify)
   Maple [C] (warning: unable to verify)
   Fricas [F]
   Sympy [F(-1)]
   Maxima [F(-2)]
   Giac [F]
   Mupad [F(-1)]

Optimal result

Integrand size = 21, antiderivative size = 1276 \[ \int \frac {x^2 \left (a+b \text {sech}^{-1}(c x)\right )}{\left (d+e x^2\right )^3} \, dx=\frac {b c \sqrt {-1+\frac {1}{c x}} \sqrt {1+\frac {1}{c x}}}{16 \sqrt {-d} \sqrt {e} \left (c^2 d+e\right ) \left (\sqrt {-d} \sqrt {e}-\frac {d}{x}\right )}+\frac {b c \sqrt {-1+\frac {1}{c x}} \sqrt {1+\frac {1}{c x}}}{16 \sqrt {-d} \sqrt {e} \left (c^2 d+e\right ) \left (\sqrt {-d} \sqrt {e}+\frac {d}{x}\right )}+\frac {a+b \text {sech}^{-1}(c x)}{16 \sqrt {-d} \sqrt {e} \left (\sqrt {-d} \sqrt {e}-\frac {d}{x}\right )^2}+\frac {a+b \text {sech}^{-1}(c x)}{16 d e \left (\sqrt {-d} \sqrt {e}-\frac {d}{x}\right )}-\frac {a+b \text {sech}^{-1}(c x)}{16 \sqrt {-d} \sqrt {e} \left (\sqrt {-d} \sqrt {e}+\frac {d}{x}\right )^2}-\frac {a+b \text {sech}^{-1}(c x)}{16 d e \left (\sqrt {-d} \sqrt {e}+\frac {d}{x}\right )}+\frac {b \arctan \left (\frac {\sqrt {c d-\sqrt {-d} \sqrt {e}} \sqrt {1+\frac {1}{c x}}}{\sqrt {c d+\sqrt {-d} \sqrt {e}} \sqrt {-1+\frac {1}{c x}}}\right )}{8 \left (c d-\sqrt {-d} \sqrt {e}\right )^{3/2} \left (c d+\sqrt {-d} \sqrt {e}\right )^{3/2}}-\frac {b \arctan \left (\frac {\sqrt {c d-\sqrt {-d} \sqrt {e}} \sqrt {1+\frac {1}{c x}}}{\sqrt {c d+\sqrt {-d} \sqrt {e}} \sqrt {-1+\frac {1}{c x}}}\right )}{8 d \sqrt {c d-\sqrt {-d} \sqrt {e}} \sqrt {c d+\sqrt {-d} \sqrt {e}} e}+\frac {b \arctan \left (\frac {\sqrt {c d+\sqrt {-d} \sqrt {e}} \sqrt {1+\frac {1}{c x}}}{\sqrt {c d-\sqrt {-d} \sqrt {e}} \sqrt {-1+\frac {1}{c x}}}\right )}{8 \left (c d-\sqrt {-d} \sqrt {e}\right )^{3/2} \left (c d+\sqrt {-d} \sqrt {e}\right )^{3/2}}-\frac {b \arctan \left (\frac {\sqrt {c d+\sqrt {-d} \sqrt {e}} \sqrt {1+\frac {1}{c x}}}{\sqrt {c d-\sqrt {-d} \sqrt {e}} \sqrt {-1+\frac {1}{c x}}}\right )}{8 d \sqrt {c d-\sqrt {-d} \sqrt {e}} \sqrt {c d+\sqrt {-d} \sqrt {e}} e}-\frac {\left (a+b \text {sech}^{-1}(c x)\right ) \log \left (1-\frac {c \sqrt {-d} e^{\text {sech}^{-1}(c x)}}{\sqrt {e}-\sqrt {c^2 d+e}}\right )}{16 (-d)^{3/2} e^{3/2}}+\frac {\left (a+b \text {sech}^{-1}(c x)\right ) \log \left (1+\frac {c \sqrt {-d} e^{\text {sech}^{-1}(c x)}}{\sqrt {e}-\sqrt {c^2 d+e}}\right )}{16 (-d)^{3/2} e^{3/2}}-\frac {\left (a+b \text {sech}^{-1}(c x)\right ) \log \left (1-\frac {c \sqrt {-d} e^{\text {sech}^{-1}(c x)}}{\sqrt {e}+\sqrt {c^2 d+e}}\right )}{16 (-d)^{3/2} e^{3/2}}+\frac {\left (a+b \text {sech}^{-1}(c x)\right ) \log \left (1+\frac {c \sqrt {-d} e^{\text {sech}^{-1}(c x)}}{\sqrt {e}+\sqrt {c^2 d+e}}\right )}{16 (-d)^{3/2} e^{3/2}}+\frac {b \operatorname {PolyLog}\left (2,-\frac {c \sqrt {-d} e^{\text {sech}^{-1}(c x)}}{\sqrt {e}-\sqrt {c^2 d+e}}\right )}{16 (-d)^{3/2} e^{3/2}}-\frac {b \operatorname {PolyLog}\left (2,\frac {c \sqrt {-d} e^{\text {sech}^{-1}(c x)}}{\sqrt {e}-\sqrt {c^2 d+e}}\right )}{16 (-d)^{3/2} e^{3/2}}+\frac {b \operatorname {PolyLog}\left (2,-\frac {c \sqrt {-d} e^{\text {sech}^{-1}(c x)}}{\sqrt {e}+\sqrt {c^2 d+e}}\right )}{16 (-d)^{3/2} e^{3/2}}-\frac {b \operatorname {PolyLog}\left (2,\frac {c \sqrt {-d} e^{\text {sech}^{-1}(c x)}}{\sqrt {e}+\sqrt {c^2 d+e}}\right )}{16 (-d)^{3/2} e^{3/2}} \]

[Out]

-1/16*(a+b*arcsech(c*x))*ln(1-c*(1/c/x+(-1+1/c/x)^(1/2)*(1+1/c/x)^(1/2))*(-d)^(1/2)/(e^(1/2)-(c^2*d+e)^(1/2)))
/(-d)^(3/2)/e^(3/2)+1/16*(a+b*arcsech(c*x))*ln(1+c*(1/c/x+(-1+1/c/x)^(1/2)*(1+1/c/x)^(1/2))*(-d)^(1/2)/(e^(1/2
)-(c^2*d+e)^(1/2)))/(-d)^(3/2)/e^(3/2)-1/16*(a+b*arcsech(c*x))*ln(1-c*(1/c/x+(-1+1/c/x)^(1/2)*(1+1/c/x)^(1/2))
*(-d)^(1/2)/(e^(1/2)+(c^2*d+e)^(1/2)))/(-d)^(3/2)/e^(3/2)+1/16*(a+b*arcsech(c*x))*ln(1+c*(1/c/x+(-1+1/c/x)^(1/
2)*(1+1/c/x)^(1/2))*(-d)^(1/2)/(e^(1/2)+(c^2*d+e)^(1/2)))/(-d)^(3/2)/e^(3/2)+1/16*b*polylog(2,-c*(1/c/x+(-1+1/
c/x)^(1/2)*(1+1/c/x)^(1/2))*(-d)^(1/2)/(e^(1/2)-(c^2*d+e)^(1/2)))/(-d)^(3/2)/e^(3/2)-1/16*b*polylog(2,c*(1/c/x
+(-1+1/c/x)^(1/2)*(1+1/c/x)^(1/2))*(-d)^(1/2)/(e^(1/2)-(c^2*d+e)^(1/2)))/(-d)^(3/2)/e^(3/2)+1/16*b*polylog(2,-
c*(1/c/x+(-1+1/c/x)^(1/2)*(1+1/c/x)^(1/2))*(-d)^(1/2)/(e^(1/2)+(c^2*d+e)^(1/2)))/(-d)^(3/2)/e^(3/2)-1/16*b*pol
ylog(2,c*(1/c/x+(-1+1/c/x)^(1/2)*(1+1/c/x)^(1/2))*(-d)^(1/2)/(e^(1/2)+(c^2*d+e)^(1/2)))/(-d)^(3/2)/e^(3/2)+1/8
*b*arctan((1+1/c/x)^(1/2)*(c*d-(-d)^(1/2)*e^(1/2))^(1/2)/(-1+1/c/x)^(1/2)/(c*d+(-d)^(1/2)*e^(1/2))^(1/2))/(c*d
-(-d)^(1/2)*e^(1/2))^(3/2)/(c*d+(-d)^(1/2)*e^(1/2))^(3/2)+1/8*b*arctan((1+1/c/x)^(1/2)*(c*d+(-d)^(1/2)*e^(1/2)
)^(1/2)/(-1+1/c/x)^(1/2)/(c*d-(-d)^(1/2)*e^(1/2))^(1/2))/(c*d-(-d)^(1/2)*e^(1/2))^(3/2)/(c*d+(-d)^(1/2)*e^(1/2
))^(3/2)+1/16*(a+b*arcsech(c*x))/(-d)^(1/2)/e^(1/2)/(-d/x+(-d)^(1/2)*e^(1/2))^2+1/16*(a+b*arcsech(c*x))/d/e/(-
d/x+(-d)^(1/2)*e^(1/2))+1/16*(-a-b*arcsech(c*x))/(-d)^(1/2)/e^(1/2)/(d/x+(-d)^(1/2)*e^(1/2))^2+1/16*(-a-b*arcs
ech(c*x))/d/e/(d/x+(-d)^(1/2)*e^(1/2))+1/16*b*c*(-1+1/c/x)^(1/2)*(1+1/c/x)^(1/2)/(c^2*d+e)/(-d)^(1/2)/e^(1/2)/
(-d/x+(-d)^(1/2)*e^(1/2))+1/16*b*c*(-1+1/c/x)^(1/2)*(1+1/c/x)^(1/2)/(c^2*d+e)/(-d)^(1/2)/e^(1/2)/(d/x+(-d)^(1/
2)*e^(1/2))-1/8*b*arctan((1+1/c/x)^(1/2)*(c*d-(-d)^(1/2)*e^(1/2))^(1/2)/(-1+1/c/x)^(1/2)/(c*d+(-d)^(1/2)*e^(1/
2))^(1/2))/d/e/(c*d-(-d)^(1/2)*e^(1/2))^(1/2)/(c*d+(-d)^(1/2)*e^(1/2))^(1/2)-1/8*b*arctan((1+1/c/x)^(1/2)*(c*d
+(-d)^(1/2)*e^(1/2))^(1/2)/(-1+1/c/x)^(1/2)/(c*d-(-d)^(1/2)*e^(1/2))^(1/2))/d/e/(c*d-(-d)^(1/2)*e^(1/2))^(1/2)
/(c*d+(-d)^(1/2)*e^(1/2))^(1/2)

Rubi [A] (verified)

Time = 2.71 (sec) , antiderivative size = 1276, normalized size of antiderivative = 1.00, number of steps used = 63, number of rules used = 12, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.571, Rules used = {6438, 5959, 5909, 5963, 98, 95, 211, 5962, 5681, 2221, 2317, 2438} \[ \int \frac {x^2 \left (a+b \text {sech}^{-1}(c x)\right )}{\left (d+e x^2\right )^3} \, dx=\frac {b \sqrt {\frac {1}{c x}-1} \sqrt {1+\frac {1}{c x}} c}{16 \sqrt {-d} \sqrt {e} \left (d c^2+e\right ) \left (\sqrt {-d} \sqrt {e}-\frac {d}{x}\right )}+\frac {b \sqrt {\frac {1}{c x}-1} \sqrt {1+\frac {1}{c x}} c}{16 \sqrt {-d} \sqrt {e} \left (d c^2+e\right ) \left (\frac {d}{x}+\sqrt {-d} \sqrt {e}\right )}+\frac {a+b \text {sech}^{-1}(c x)}{16 d e \left (\sqrt {-d} \sqrt {e}-\frac {d}{x}\right )}-\frac {a+b \text {sech}^{-1}(c x)}{16 d e \left (\frac {d}{x}+\sqrt {-d} \sqrt {e}\right )}+\frac {a+b \text {sech}^{-1}(c x)}{16 \sqrt {-d} \sqrt {e} \left (\sqrt {-d} \sqrt {e}-\frac {d}{x}\right )^2}-\frac {a+b \text {sech}^{-1}(c x)}{16 \sqrt {-d} \sqrt {e} \left (\frac {d}{x}+\sqrt {-d} \sqrt {e}\right )^2}-\frac {b \arctan \left (\frac {\sqrt {c d-\sqrt {-d} \sqrt {e}} \sqrt {1+\frac {1}{c x}}}{\sqrt {c d+\sqrt {-d} \sqrt {e}} \sqrt {\frac {1}{c x}-1}}\right )}{8 d \sqrt {c d-\sqrt {-d} \sqrt {e}} \sqrt {c d+\sqrt {-d} \sqrt {e}} e}+\frac {b \arctan \left (\frac {\sqrt {c d-\sqrt {-d} \sqrt {e}} \sqrt {1+\frac {1}{c x}}}{\sqrt {c d+\sqrt {-d} \sqrt {e}} \sqrt {\frac {1}{c x}-1}}\right )}{8 \left (c d-\sqrt {-d} \sqrt {e}\right )^{3/2} \left (c d+\sqrt {-d} \sqrt {e}\right )^{3/2}}-\frac {b \arctan \left (\frac {\sqrt {c d+\sqrt {-d} \sqrt {e}} \sqrt {1+\frac {1}{c x}}}{\sqrt {c d-\sqrt {-d} \sqrt {e}} \sqrt {\frac {1}{c x}-1}}\right )}{8 d \sqrt {c d-\sqrt {-d} \sqrt {e}} \sqrt {c d+\sqrt {-d} \sqrt {e}} e}+\frac {b \arctan \left (\frac {\sqrt {c d+\sqrt {-d} \sqrt {e}} \sqrt {1+\frac {1}{c x}}}{\sqrt {c d-\sqrt {-d} \sqrt {e}} \sqrt {\frac {1}{c x}-1}}\right )}{8 \left (c d-\sqrt {-d} \sqrt {e}\right )^{3/2} \left (c d+\sqrt {-d} \sqrt {e}\right )^{3/2}}-\frac {\left (a+b \text {sech}^{-1}(c x)\right ) \log \left (1-\frac {c \sqrt {-d} e^{\text {sech}^{-1}(c x)}}{\sqrt {e}-\sqrt {d c^2+e}}\right )}{16 (-d)^{3/2} e^{3/2}}+\frac {\left (a+b \text {sech}^{-1}(c x)\right ) \log \left (\frac {\sqrt {-d} e^{\text {sech}^{-1}(c x)} c}{\sqrt {e}-\sqrt {d c^2+e}}+1\right )}{16 (-d)^{3/2} e^{3/2}}-\frac {\left (a+b \text {sech}^{-1}(c x)\right ) \log \left (1-\frac {c \sqrt {-d} e^{\text {sech}^{-1}(c x)}}{\sqrt {e}+\sqrt {d c^2+e}}\right )}{16 (-d)^{3/2} e^{3/2}}+\frac {\left (a+b \text {sech}^{-1}(c x)\right ) \log \left (\frac {\sqrt {-d} e^{\text {sech}^{-1}(c x)} c}{\sqrt {e}+\sqrt {d c^2+e}}+1\right )}{16 (-d)^{3/2} e^{3/2}}+\frac {b \operatorname {PolyLog}\left (2,-\frac {c \sqrt {-d} e^{\text {sech}^{-1}(c x)}}{\sqrt {e}-\sqrt {d c^2+e}}\right )}{16 (-d)^{3/2} e^{3/2}}-\frac {b \operatorname {PolyLog}\left (2,\frac {c \sqrt {-d} e^{\text {sech}^{-1}(c x)}}{\sqrt {e}-\sqrt {d c^2+e}}\right )}{16 (-d)^{3/2} e^{3/2}}+\frac {b \operatorname {PolyLog}\left (2,-\frac {c \sqrt {-d} e^{\text {sech}^{-1}(c x)}}{\sqrt {e}+\sqrt {d c^2+e}}\right )}{16 (-d)^{3/2} e^{3/2}}-\frac {b \operatorname {PolyLog}\left (2,\frac {c \sqrt {-d} e^{\text {sech}^{-1}(c x)}}{\sqrt {e}+\sqrt {d c^2+e}}\right )}{16 (-d)^{3/2} e^{3/2}} \]

[In]

Int[(x^2*(a + b*ArcSech[c*x]))/(d + e*x^2)^3,x]

[Out]

(b*c*Sqrt[-1 + 1/(c*x)]*Sqrt[1 + 1/(c*x)])/(16*Sqrt[-d]*Sqrt[e]*(c^2*d + e)*(Sqrt[-d]*Sqrt[e] - d/x)) + (b*c*S
qrt[-1 + 1/(c*x)]*Sqrt[1 + 1/(c*x)])/(16*Sqrt[-d]*Sqrt[e]*(c^2*d + e)*(Sqrt[-d]*Sqrt[e] + d/x)) + (a + b*ArcSe
ch[c*x])/(16*Sqrt[-d]*Sqrt[e]*(Sqrt[-d]*Sqrt[e] - d/x)^2) + (a + b*ArcSech[c*x])/(16*d*e*(Sqrt[-d]*Sqrt[e] - d
/x)) - (a + b*ArcSech[c*x])/(16*Sqrt[-d]*Sqrt[e]*(Sqrt[-d]*Sqrt[e] + d/x)^2) - (a + b*ArcSech[c*x])/(16*d*e*(S
qrt[-d]*Sqrt[e] + d/x)) + (b*ArcTan[(Sqrt[c*d - Sqrt[-d]*Sqrt[e]]*Sqrt[1 + 1/(c*x)])/(Sqrt[c*d + Sqrt[-d]*Sqrt
[e]]*Sqrt[-1 + 1/(c*x)])])/(8*(c*d - Sqrt[-d]*Sqrt[e])^(3/2)*(c*d + Sqrt[-d]*Sqrt[e])^(3/2)) - (b*ArcTan[(Sqrt
[c*d - Sqrt[-d]*Sqrt[e]]*Sqrt[1 + 1/(c*x)])/(Sqrt[c*d + Sqrt[-d]*Sqrt[e]]*Sqrt[-1 + 1/(c*x)])])/(8*d*Sqrt[c*d
- Sqrt[-d]*Sqrt[e]]*Sqrt[c*d + Sqrt[-d]*Sqrt[e]]*e) + (b*ArcTan[(Sqrt[c*d + Sqrt[-d]*Sqrt[e]]*Sqrt[1 + 1/(c*x)
])/(Sqrt[c*d - Sqrt[-d]*Sqrt[e]]*Sqrt[-1 + 1/(c*x)])])/(8*(c*d - Sqrt[-d]*Sqrt[e])^(3/2)*(c*d + Sqrt[-d]*Sqrt[
e])^(3/2)) - (b*ArcTan[(Sqrt[c*d + Sqrt[-d]*Sqrt[e]]*Sqrt[1 + 1/(c*x)])/(Sqrt[c*d - Sqrt[-d]*Sqrt[e]]*Sqrt[-1
+ 1/(c*x)])])/(8*d*Sqrt[c*d - Sqrt[-d]*Sqrt[e]]*Sqrt[c*d + Sqrt[-d]*Sqrt[e]]*e) - ((a + b*ArcSech[c*x])*Log[1
- (c*Sqrt[-d]*E^ArcSech[c*x])/(Sqrt[e] - Sqrt[c^2*d + e])])/(16*(-d)^(3/2)*e^(3/2)) + ((a + b*ArcSech[c*x])*Lo
g[1 + (c*Sqrt[-d]*E^ArcSech[c*x])/(Sqrt[e] - Sqrt[c^2*d + e])])/(16*(-d)^(3/2)*e^(3/2)) - ((a + b*ArcSech[c*x]
)*Log[1 - (c*Sqrt[-d]*E^ArcSech[c*x])/(Sqrt[e] + Sqrt[c^2*d + e])])/(16*(-d)^(3/2)*e^(3/2)) + ((a + b*ArcSech[
c*x])*Log[1 + (c*Sqrt[-d]*E^ArcSech[c*x])/(Sqrt[e] + Sqrt[c^2*d + e])])/(16*(-d)^(3/2)*e^(3/2)) + (b*PolyLog[2
, -((c*Sqrt[-d]*E^ArcSech[c*x])/(Sqrt[e] - Sqrt[c^2*d + e]))])/(16*(-d)^(3/2)*e^(3/2)) - (b*PolyLog[2, (c*Sqrt
[-d]*E^ArcSech[c*x])/(Sqrt[e] - Sqrt[c^2*d + e])])/(16*(-d)^(3/2)*e^(3/2)) + (b*PolyLog[2, -((c*Sqrt[-d]*E^Arc
Sech[c*x])/(Sqrt[e] + Sqrt[c^2*d + e]))])/(16*(-d)^(3/2)*e^(3/2)) - (b*PolyLog[2, (c*Sqrt[-d]*E^ArcSech[c*x])/
(Sqrt[e] + Sqrt[c^2*d + e])])/(16*(-d)^(3/2)*e^(3/2))

Rule 95

Int[(((a_.) + (b_.)*(x_))^(m_)*((c_.) + (d_.)*(x_))^(n_))/((e_.) + (f_.)*(x_)), x_Symbol] :> With[{q = Denomin
ator[m]}, Dist[q, Subst[Int[x^(q*(m + 1) - 1)/(b*e - a*f - (d*e - c*f)*x^q), x], x, (a + b*x)^(1/q)/(c + d*x)^
(1/q)], x]] /; FreeQ[{a, b, c, d, e, f}, x] && EqQ[m + n + 1, 0] && RationalQ[n] && LtQ[-1, m, 0] && SimplerQ[
a + b*x, c + d*x]

Rule 98

Int[((a_.) + (b_.)*(x_))^(m_)*((c_.) + (d_.)*(x_))^(n_.)*((e_.) + (f_.)*(x_))^(p_.), x_Symbol] :> Simp[b*(a +
b*x)^(m + 1)*(c + d*x)^(n + 1)*((e + f*x)^(p + 1)/((m + 1)*(b*c - a*d)*(b*e - a*f))), x] + Dist[(a*d*f*(m + 1)
 + b*c*f*(n + 1) + b*d*e*(p + 1))/((m + 1)*(b*c - a*d)*(b*e - a*f)), Int[(a + b*x)^(m + 1)*(c + d*x)^n*(e + f*
x)^p, x], x] /; FreeQ[{a, b, c, d, e, f, m, n, p}, x] && EqQ[Simplify[m + n + p + 3], 0] && (LtQ[m, -1] || Sum
SimplerQ[m, 1])

Rule 211

Int[((a_) + (b_.)*(x_)^2)^(-1), x_Symbol] :> Simp[(Rt[a/b, 2]/a)*ArcTan[x/Rt[a/b, 2]], x] /; FreeQ[{a, b}, x]
&& PosQ[a/b]

Rule 2221

Int[(((F_)^((g_.)*((e_.) + (f_.)*(x_))))^(n_.)*((c_.) + (d_.)*(x_))^(m_.))/((a_) + (b_.)*((F_)^((g_.)*((e_.) +
 (f_.)*(x_))))^(n_.)), x_Symbol] :> Simp[((c + d*x)^m/(b*f*g*n*Log[F]))*Log[1 + b*((F^(g*(e + f*x)))^n/a)], x]
 - Dist[d*(m/(b*f*g*n*Log[F])), Int[(c + d*x)^(m - 1)*Log[1 + b*((F^(g*(e + f*x)))^n/a)], x], x] /; FreeQ[{F,
a, b, c, d, e, f, g, n}, x] && IGtQ[m, 0]

Rule 2317

Int[Log[(a_) + (b_.)*((F_)^((e_.)*((c_.) + (d_.)*(x_))))^(n_.)], x_Symbol] :> Dist[1/(d*e*n*Log[F]), Subst[Int
[Log[a + b*x]/x, x], x, (F^(e*(c + d*x)))^n], x] /; FreeQ[{F, a, b, c, d, e, n}, x] && GtQ[a, 0]

Rule 2438

Int[Log[(c_.)*((d_) + (e_.)*(x_)^(n_.))]/(x_), x_Symbol] :> Simp[-PolyLog[2, (-c)*e*x^n]/n, x] /; FreeQ[{c, d,
 e, n}, x] && EqQ[c*d, 1]

Rule 5681

Int[(((e_.) + (f_.)*(x_))^(m_.)*Sinh[(c_.) + (d_.)*(x_)])/(Cosh[(c_.) + (d_.)*(x_)]*(b_.) + (a_)), x_Symbol] :
> Simp[-(e + f*x)^(m + 1)/(b*f*(m + 1)), x] + (Int[(e + f*x)^m*(E^(c + d*x)/(a - Rt[a^2 - b^2, 2] + b*E^(c + d
*x))), x] + Int[(e + f*x)^m*(E^(c + d*x)/(a + Rt[a^2 - b^2, 2] + b*E^(c + d*x))), x]) /; FreeQ[{a, b, c, d, e,
 f}, x] && IGtQ[m, 0] && NeQ[a^2 - b^2, 0]

Rule 5909

Int[((a_.) + ArcCosh[(c_.)*(x_)]*(b_.))^(n_.)*((d_) + (e_.)*(x_)^2)^(p_.), x_Symbol] :> Int[ExpandIntegrand[(a
 + b*ArcCosh[c*x])^n, (d + e*x^2)^p, x], x] /; FreeQ[{a, b, c, d, e, n}, x] && NeQ[c^2*d + e, 0] && IntegerQ[p
] && (p > 0 || IGtQ[n, 0])

Rule 5959

Int[((a_.) + ArcCosh[(c_.)*(x_)]*(b_.))^(n_.)*((f_.)*(x_))^(m_.)*((d_) + (e_.)*(x_)^2)^(p_.), x_Symbol] :> Int
[ExpandIntegrand[(a + b*ArcCosh[c*x])^n, (f*x)^m*(d + e*x^2)^p, x], x] /; FreeQ[{a, b, c, d, e, f}, x] && NeQ[
c^2*d + e, 0] && IGtQ[n, 0] && IntegerQ[p] && IntegerQ[m]

Rule 5962

Int[((a_.) + ArcCosh[(c_.)*(x_)]*(b_.))^(n_.)/((d_.) + (e_.)*(x_)), x_Symbol] :> Subst[Int[(a + b*x)^n*(Sinh[x
]/(c*d + e*Cosh[x])), x], x, ArcCosh[c*x]] /; FreeQ[{a, b, c, d, e}, x] && IGtQ[n, 0]

Rule 5963

Int[((a_.) + ArcCosh[(c_.)*(x_)]*(b_.))^(n_.)*((d_.) + (e_.)*(x_))^(m_.), x_Symbol] :> Simp[(d + e*x)^(m + 1)*
((a + b*ArcCosh[c*x])^n/(e*(m + 1))), x] - Dist[b*c*(n/(e*(m + 1))), Int[(d + e*x)^(m + 1)*((a + b*ArcCosh[c*x
])^(n - 1)/(Sqrt[-1 + c*x]*Sqrt[1 + c*x])), x], x] /; FreeQ[{a, b, c, d, e, m}, x] && IGtQ[n, 0] && NeQ[m, -1]

Rule 6438

Int[((a_.) + ArcSech[(c_.)*(x_)]*(b_.))^(n_.)*(x_)^(m_.)*((d_.) + (e_.)*(x_)^2)^(p_.), x_Symbol] :> -Subst[Int
[(e + d*x^2)^p*((a + b*ArcCosh[x/c])^n/x^(m + 2*(p + 1))), x], x, 1/x] /; FreeQ[{a, b, c, d, e, n}, x] && IGtQ
[n, 0] && IntegersQ[m, p]

Rubi steps \begin{align*} \text {integral}& = -\text {Subst}\left (\int \frac {x^2 \left (a+b \text {arccosh}\left (\frac {x}{c}\right )\right )}{\left (e+d x^2\right )^3} \, dx,x,\frac {1}{x}\right ) \\ & = -\text {Subst}\left (\int \left (-\frac {e \left (a+b \text {arccosh}\left (\frac {x}{c}\right )\right )}{d \left (e+d x^2\right )^3}+\frac {a+b \text {arccosh}\left (\frac {x}{c}\right )}{d \left (e+d x^2\right )^2}\right ) \, dx,x,\frac {1}{x}\right ) \\ & = -\frac {\text {Subst}\left (\int \frac {a+b \text {arccosh}\left (\frac {x}{c}\right )}{\left (e+d x^2\right )^2} \, dx,x,\frac {1}{x}\right )}{d}+\frac {e \text {Subst}\left (\int \frac {a+b \text {arccosh}\left (\frac {x}{c}\right )}{\left (e+d x^2\right )^3} \, dx,x,\frac {1}{x}\right )}{d} \\ & = -\frac {\text {Subst}\left (\int \left (-\frac {d \left (a+b \text {arccosh}\left (\frac {x}{c}\right )\right )}{4 e \left (\sqrt {-d} \sqrt {e}-d x\right )^2}-\frac {d \left (a+b \text {arccosh}\left (\frac {x}{c}\right )\right )}{4 e \left (\sqrt {-d} \sqrt {e}+d x\right )^2}-\frac {d \left (a+b \text {arccosh}\left (\frac {x}{c}\right )\right )}{2 e \left (-d e-d^2 x^2\right )}\right ) \, dx,x,\frac {1}{x}\right )}{d}+\frac {e \text {Subst}\left (\int \left (-\frac {d^3 \left (a+b \text {arccosh}\left (\frac {x}{c}\right )\right )}{8 (-d)^{3/2} e^{3/2} \left (\sqrt {-d} \sqrt {e}-d x\right )^3}-\frac {3 d \left (a+b \text {arccosh}\left (\frac {x}{c}\right )\right )}{16 e^2 \left (\sqrt {-d} \sqrt {e}-d x\right )^2}-\frac {d^3 \left (a+b \text {arccosh}\left (\frac {x}{c}\right )\right )}{8 (-d)^{3/2} e^{3/2} \left (\sqrt {-d} \sqrt {e}+d x\right )^3}-\frac {3 d \left (a+b \text {arccosh}\left (\frac {x}{c}\right )\right )}{16 e^2 \left (\sqrt {-d} \sqrt {e}+d x\right )^2}-\frac {3 d \left (a+b \text {arccosh}\left (\frac {x}{c}\right )\right )}{8 e^2 \left (-d e-d^2 x^2\right )}\right ) \, dx,x,\frac {1}{x}\right )}{d} \\ & = -\frac {3 \text {Subst}\left (\int \frac {a+b \text {arccosh}\left (\frac {x}{c}\right )}{\left (\sqrt {-d} \sqrt {e}-d x\right )^2} \, dx,x,\frac {1}{x}\right )}{16 e}-\frac {3 \text {Subst}\left (\int \frac {a+b \text {arccosh}\left (\frac {x}{c}\right )}{\left (\sqrt {-d} \sqrt {e}+d x\right )^2} \, dx,x,\frac {1}{x}\right )}{16 e}+\frac {\text {Subst}\left (\int \frac {a+b \text {arccosh}\left (\frac {x}{c}\right )}{\left (\sqrt {-d} \sqrt {e}-d x\right )^2} \, dx,x,\frac {1}{x}\right )}{4 e}+\frac {\text {Subst}\left (\int \frac {a+b \text {arccosh}\left (\frac {x}{c}\right )}{\left (\sqrt {-d} \sqrt {e}+d x\right )^2} \, dx,x,\frac {1}{x}\right )}{4 e}-\frac {3 \text {Subst}\left (\int \frac {a+b \text {arccosh}\left (\frac {x}{c}\right )}{-d e-d^2 x^2} \, dx,x,\frac {1}{x}\right )}{8 e}+\frac {\text {Subst}\left (\int \frac {a+b \text {arccosh}\left (\frac {x}{c}\right )}{-d e-d^2 x^2} \, dx,x,\frac {1}{x}\right )}{2 e}-\frac {\sqrt {-d} \text {Subst}\left (\int \frac {a+b \text {arccosh}\left (\frac {x}{c}\right )}{\left (\sqrt {-d} \sqrt {e}-d x\right )^3} \, dx,x,\frac {1}{x}\right )}{8 \sqrt {e}}-\frac {\sqrt {-d} \text {Subst}\left (\int \frac {a+b \text {arccosh}\left (\frac {x}{c}\right )}{\left (\sqrt {-d} \sqrt {e}+d x\right )^3} \, dx,x,\frac {1}{x}\right )}{8 \sqrt {e}} \\ & = \frac {a+b \text {sech}^{-1}(c x)}{16 \sqrt {-d} \sqrt {e} \left (\sqrt {-d} \sqrt {e}-\frac {d}{x}\right )^2}+\frac {a+b \text {sech}^{-1}(c x)}{16 d e \left (\sqrt {-d} \sqrt {e}-\frac {d}{x}\right )}-\frac {a+b \text {sech}^{-1}(c x)}{16 \sqrt {-d} \sqrt {e} \left (\sqrt {-d} \sqrt {e}+\frac {d}{x}\right )^2}-\frac {a+b \text {sech}^{-1}(c x)}{16 d e \left (\sqrt {-d} \sqrt {e}+\frac {d}{x}\right )}-\frac {3 \text {Subst}\left (\int \left (-\frac {a+b \text {arccosh}\left (\frac {x}{c}\right )}{2 d \sqrt {e} \left (\sqrt {e}-\sqrt {-d} x\right )}-\frac {a+b \text {arccosh}\left (\frac {x}{c}\right )}{2 d \sqrt {e} \left (\sqrt {e}+\sqrt {-d} x\right )}\right ) \, dx,x,\frac {1}{x}\right )}{8 e}+\frac {\text {Subst}\left (\int \left (-\frac {a+b \text {arccosh}\left (\frac {x}{c}\right )}{2 d \sqrt {e} \left (\sqrt {e}-\sqrt {-d} x\right )}-\frac {a+b \text {arccosh}\left (\frac {x}{c}\right )}{2 d \sqrt {e} \left (\sqrt {e}+\sqrt {-d} x\right )}\right ) \, dx,x,\frac {1}{x}\right )}{2 e}+\frac {(3 b) \text {Subst}\left (\int \frac {1}{\sqrt {-1+\frac {x}{c}} \sqrt {1+\frac {x}{c}} \left (\sqrt {-d} \sqrt {e}-d x\right )} \, dx,x,\frac {1}{x}\right )}{16 c d e}-\frac {(3 b) \text {Subst}\left (\int \frac {1}{\sqrt {-1+\frac {x}{c}} \sqrt {1+\frac {x}{c}} \left (\sqrt {-d} \sqrt {e}+d x\right )} \, dx,x,\frac {1}{x}\right )}{16 c d e}-\frac {b \text {Subst}\left (\int \frac {1}{\sqrt {-1+\frac {x}{c}} \sqrt {1+\frac {x}{c}} \left (\sqrt {-d} \sqrt {e}-d x\right )} \, dx,x,\frac {1}{x}\right )}{4 c d e}+\frac {b \text {Subst}\left (\int \frac {1}{\sqrt {-1+\frac {x}{c}} \sqrt {1+\frac {x}{c}} \left (\sqrt {-d} \sqrt {e}+d x\right )} \, dx,x,\frac {1}{x}\right )}{4 c d e}-\frac {b \text {Subst}\left (\int \frac {1}{\sqrt {-1+\frac {x}{c}} \sqrt {1+\frac {x}{c}} \left (\sqrt {-d} \sqrt {e}-d x\right )^2} \, dx,x,\frac {1}{x}\right )}{16 c \sqrt {-d} \sqrt {e}}+\frac {b \text {Subst}\left (\int \frac {1}{\sqrt {-1+\frac {x}{c}} \sqrt {1+\frac {x}{c}} \left (\sqrt {-d} \sqrt {e}+d x\right )^2} \, dx,x,\frac {1}{x}\right )}{16 c \sqrt {-d} \sqrt {e}} \\ & = \frac {b c \sqrt {-1+\frac {1}{c x}} \sqrt {1+\frac {1}{c x}}}{16 \sqrt {-d} \sqrt {e} \left (c^2 d+e\right ) \left (\sqrt {-d} \sqrt {e}-\frac {d}{x}\right )}+\frac {b c \sqrt {-1+\frac {1}{c x}} \sqrt {1+\frac {1}{c x}}}{16 \sqrt {-d} \sqrt {e} \left (c^2 d+e\right ) \left (\sqrt {-d} \sqrt {e}+\frac {d}{x}\right )}+\frac {a+b \text {sech}^{-1}(c x)}{16 \sqrt {-d} \sqrt {e} \left (\sqrt {-d} \sqrt {e}-\frac {d}{x}\right )^2}+\frac {a+b \text {sech}^{-1}(c x)}{16 d e \left (\sqrt {-d} \sqrt {e}-\frac {d}{x}\right )}-\frac {a+b \text {sech}^{-1}(c x)}{16 \sqrt {-d} \sqrt {e} \left (\sqrt {-d} \sqrt {e}+\frac {d}{x}\right )^2}-\frac {a+b \text {sech}^{-1}(c x)}{16 d e \left (\sqrt {-d} \sqrt {e}+\frac {d}{x}\right )}+\frac {3 \text {Subst}\left (\int \frac {a+b \text {arccosh}\left (\frac {x}{c}\right )}{\sqrt {e}-\sqrt {-d} x} \, dx,x,\frac {1}{x}\right )}{16 d e^{3/2}}+\frac {3 \text {Subst}\left (\int \frac {a+b \text {arccosh}\left (\frac {x}{c}\right )}{\sqrt {e}+\sqrt {-d} x} \, dx,x,\frac {1}{x}\right )}{16 d e^{3/2}}-\frac {\text {Subst}\left (\int \frac {a+b \text {arccosh}\left (\frac {x}{c}\right )}{\sqrt {e}-\sqrt {-d} x} \, dx,x,\frac {1}{x}\right )}{4 d e^{3/2}}-\frac {\text {Subst}\left (\int \frac {a+b \text {arccosh}\left (\frac {x}{c}\right )}{\sqrt {e}+\sqrt {-d} x} \, dx,x,\frac {1}{x}\right )}{4 d e^{3/2}}+\frac {(3 b) \text {Subst}\left (\int \frac {1}{d+\frac {\sqrt {-d} \sqrt {e}}{c}-\left (-d+\frac {\sqrt {-d} \sqrt {e}}{c}\right ) x^2} \, dx,x,\frac {\sqrt {1+\frac {1}{c x}}}{\sqrt {-1+\frac {1}{c x}}}\right )}{8 c d e}-\frac {(3 b) \text {Subst}\left (\int \frac {1}{-d+\frac {\sqrt {-d} \sqrt {e}}{c}-\left (d+\frac {\sqrt {-d} \sqrt {e}}{c}\right ) x^2} \, dx,x,\frac {\sqrt {1+\frac {1}{c x}}}{\sqrt {-1+\frac {1}{c x}}}\right )}{8 c d e}-\frac {b \text {Subst}\left (\int \frac {1}{d+\frac {\sqrt {-d} \sqrt {e}}{c}-\left (-d+\frac {\sqrt {-d} \sqrt {e}}{c}\right ) x^2} \, dx,x,\frac {\sqrt {1+\frac {1}{c x}}}{\sqrt {-1+\frac {1}{c x}}}\right )}{2 c d e}+\frac {b \text {Subst}\left (\int \frac {1}{-d+\frac {\sqrt {-d} \sqrt {e}}{c}-\left (d+\frac {\sqrt {-d} \sqrt {e}}{c}\right ) x^2} \, dx,x,\frac {\sqrt {1+\frac {1}{c x}}}{\sqrt {-1+\frac {1}{c x}}}\right )}{2 c d e}+\frac {b \text {Subst}\left (\int \frac {1}{\sqrt {-1+\frac {x}{c}} \sqrt {1+\frac {x}{c}} \left (\sqrt {-d} \sqrt {e}-d x\right )} \, dx,x,\frac {1}{x}\right )}{16 c d \left (c^2 d+e\right )}-\frac {b \text {Subst}\left (\int \frac {1}{\sqrt {-1+\frac {x}{c}} \sqrt {1+\frac {x}{c}} \left (\sqrt {-d} \sqrt {e}+d x\right )} \, dx,x,\frac {1}{x}\right )}{16 c d \left (c^2 d+e\right )} \\ & = \frac {b c \sqrt {-1+\frac {1}{c x}} \sqrt {1+\frac {1}{c x}}}{16 \sqrt {-d} \sqrt {e} \left (c^2 d+e\right ) \left (\sqrt {-d} \sqrt {e}-\frac {d}{x}\right )}+\frac {b c \sqrt {-1+\frac {1}{c x}} \sqrt {1+\frac {1}{c x}}}{16 \sqrt {-d} \sqrt {e} \left (c^2 d+e\right ) \left (\sqrt {-d} \sqrt {e}+\frac {d}{x}\right )}+\frac {a+b \text {sech}^{-1}(c x)}{16 \sqrt {-d} \sqrt {e} \left (\sqrt {-d} \sqrt {e}-\frac {d}{x}\right )^2}+\frac {a+b \text {sech}^{-1}(c x)}{16 d e \left (\sqrt {-d} \sqrt {e}-\frac {d}{x}\right )}-\frac {a+b \text {sech}^{-1}(c x)}{16 \sqrt {-d} \sqrt {e} \left (\sqrt {-d} \sqrt {e}+\frac {d}{x}\right )^2}-\frac {a+b \text {sech}^{-1}(c x)}{16 d e \left (\sqrt {-d} \sqrt {e}+\frac {d}{x}\right )}-\frac {b \arctan \left (\frac {\sqrt {c d-\sqrt {-d} \sqrt {e}} \sqrt {1+\frac {1}{c x}}}{\sqrt {c d+\sqrt {-d} \sqrt {e}} \sqrt {-1+\frac {1}{c x}}}\right )}{8 d \sqrt {c d-\sqrt {-d} \sqrt {e}} \sqrt {c d+\sqrt {-d} \sqrt {e}} e}-\frac {b \arctan \left (\frac {\sqrt {c d+\sqrt {-d} \sqrt {e}} \sqrt {1+\frac {1}{c x}}}{\sqrt {c d-\sqrt {-d} \sqrt {e}} \sqrt {-1+\frac {1}{c x}}}\right )}{8 d \sqrt {c d-\sqrt {-d} \sqrt {e}} \sqrt {c d+\sqrt {-d} \sqrt {e}} e}+\frac {3 \text {Subst}\left (\int \frac {(a+b x) \sinh (x)}{\frac {\sqrt {e}}{c}-\sqrt {-d} \cosh (x)} \, dx,x,\text {sech}^{-1}(c x)\right )}{16 d e^{3/2}}+\frac {3 \text {Subst}\left (\int \frac {(a+b x) \sinh (x)}{\frac {\sqrt {e}}{c}+\sqrt {-d} \cosh (x)} \, dx,x,\text {sech}^{-1}(c x)\right )}{16 d e^{3/2}}-\frac {\text {Subst}\left (\int \frac {(a+b x) \sinh (x)}{\frac {\sqrt {e}}{c}-\sqrt {-d} \cosh (x)} \, dx,x,\text {sech}^{-1}(c x)\right )}{4 d e^{3/2}}-\frac {\text {Subst}\left (\int \frac {(a+b x) \sinh (x)}{\frac {\sqrt {e}}{c}+\sqrt {-d} \cosh (x)} \, dx,x,\text {sech}^{-1}(c x)\right )}{4 d e^{3/2}}+\frac {b \text {Subst}\left (\int \frac {1}{d+\frac {\sqrt {-d} \sqrt {e}}{c}-\left (-d+\frac {\sqrt {-d} \sqrt {e}}{c}\right ) x^2} \, dx,x,\frac {\sqrt {1+\frac {1}{c x}}}{\sqrt {-1+\frac {1}{c x}}}\right )}{8 c d \left (c^2 d+e\right )}-\frac {b \text {Subst}\left (\int \frac {1}{-d+\frac {\sqrt {-d} \sqrt {e}}{c}-\left (d+\frac {\sqrt {-d} \sqrt {e}}{c}\right ) x^2} \, dx,x,\frac {\sqrt {1+\frac {1}{c x}}}{\sqrt {-1+\frac {1}{c x}}}\right )}{8 c d \left (c^2 d+e\right )} \\ & = \frac {b c \sqrt {-1+\frac {1}{c x}} \sqrt {1+\frac {1}{c x}}}{16 \sqrt {-d} \sqrt {e} \left (c^2 d+e\right ) \left (\sqrt {-d} \sqrt {e}-\frac {d}{x}\right )}+\frac {b c \sqrt {-1+\frac {1}{c x}} \sqrt {1+\frac {1}{c x}}}{16 \sqrt {-d} \sqrt {e} \left (c^2 d+e\right ) \left (\sqrt {-d} \sqrt {e}+\frac {d}{x}\right )}+\frac {a+b \text {sech}^{-1}(c x)}{16 \sqrt {-d} \sqrt {e} \left (\sqrt {-d} \sqrt {e}-\frac {d}{x}\right )^2}+\frac {a+b \text {sech}^{-1}(c x)}{16 d e \left (\sqrt {-d} \sqrt {e}-\frac {d}{x}\right )}-\frac {a+b \text {sech}^{-1}(c x)}{16 \sqrt {-d} \sqrt {e} \left (\sqrt {-d} \sqrt {e}+\frac {d}{x}\right )^2}-\frac {a+b \text {sech}^{-1}(c x)}{16 d e \left (\sqrt {-d} \sqrt {e}+\frac {d}{x}\right )}-\frac {b \arctan \left (\frac {\sqrt {c d-\sqrt {-d} \sqrt {e}} \sqrt {1+\frac {1}{c x}}}{\sqrt {c d+\sqrt {-d} \sqrt {e}} \sqrt {-1+\frac {1}{c x}}}\right )}{8 d \sqrt {c d-\sqrt {-d} \sqrt {e}} \sqrt {c d+\sqrt {-d} \sqrt {e}} e}+\frac {b \arctan \left (\frac {\sqrt {c d-\sqrt {-d} \sqrt {e}} \sqrt {1+\frac {1}{c x}}}{\sqrt {c d+\sqrt {-d} \sqrt {e}} \sqrt {-1+\frac {1}{c x}}}\right )}{8 d \sqrt {c d-\sqrt {-d} \sqrt {e}} \sqrt {c d+\sqrt {-d} \sqrt {e}} \left (c^2 d+e\right )}-\frac {b \arctan \left (\frac {\sqrt {c d+\sqrt {-d} \sqrt {e}} \sqrt {1+\frac {1}{c x}}}{\sqrt {c d-\sqrt {-d} \sqrt {e}} \sqrt {-1+\frac {1}{c x}}}\right )}{8 d \sqrt {c d-\sqrt {-d} \sqrt {e}} \sqrt {c d+\sqrt {-d} \sqrt {e}} e}+\frac {b \arctan \left (\frac {\sqrt {c d+\sqrt {-d} \sqrt {e}} \sqrt {1+\frac {1}{c x}}}{\sqrt {c d-\sqrt {-d} \sqrt {e}} \sqrt {-1+\frac {1}{c x}}}\right )}{8 d \sqrt {c d-\sqrt {-d} \sqrt {e}} \sqrt {c d+\sqrt {-d} \sqrt {e}} \left (c^2 d+e\right )}+\frac {3 \text {Subst}\left (\int \frac {e^x (a+b x)}{\frac {\sqrt {e}}{c}-\frac {\sqrt {c^2 d+e}}{c}-\sqrt {-d} e^x} \, dx,x,\text {sech}^{-1}(c x)\right )}{16 d e^{3/2}}+\frac {3 \text {Subst}\left (\int \frac {e^x (a+b x)}{\frac {\sqrt {e}}{c}+\frac {\sqrt {c^2 d+e}}{c}-\sqrt {-d} e^x} \, dx,x,\text {sech}^{-1}(c x)\right )}{16 d e^{3/2}}+\frac {3 \text {Subst}\left (\int \frac {e^x (a+b x)}{\frac {\sqrt {e}}{c}-\frac {\sqrt {c^2 d+e}}{c}+\sqrt {-d} e^x} \, dx,x,\text {sech}^{-1}(c x)\right )}{16 d e^{3/2}}+\frac {3 \text {Subst}\left (\int \frac {e^x (a+b x)}{\frac {\sqrt {e}}{c}+\frac {\sqrt {c^2 d+e}}{c}+\sqrt {-d} e^x} \, dx,x,\text {sech}^{-1}(c x)\right )}{16 d e^{3/2}}-\frac {\text {Subst}\left (\int \frac {e^x (a+b x)}{\frac {\sqrt {e}}{c}-\frac {\sqrt {c^2 d+e}}{c}-\sqrt {-d} e^x} \, dx,x,\text {sech}^{-1}(c x)\right )}{4 d e^{3/2}}-\frac {\text {Subst}\left (\int \frac {e^x (a+b x)}{\frac {\sqrt {e}}{c}+\frac {\sqrt {c^2 d+e}}{c}-\sqrt {-d} e^x} \, dx,x,\text {sech}^{-1}(c x)\right )}{4 d e^{3/2}}-\frac {\text {Subst}\left (\int \frac {e^x (a+b x)}{\frac {\sqrt {e}}{c}-\frac {\sqrt {c^2 d+e}}{c}+\sqrt {-d} e^x} \, dx,x,\text {sech}^{-1}(c x)\right )}{4 d e^{3/2}}-\frac {\text {Subst}\left (\int \frac {e^x (a+b x)}{\frac {\sqrt {e}}{c}+\frac {\sqrt {c^2 d+e}}{c}+\sqrt {-d} e^x} \, dx,x,\text {sech}^{-1}(c x)\right )}{4 d e^{3/2}} \\ & = \text {Too large to display} \\ \end{align*}

Mathematica [C] (warning: unable to verify)

Result contains complex when optimal does not.

Time = 6.11 (sec) , antiderivative size = 2030, normalized size of antiderivative = 1.59 \[ \int \frac {x^2 \left (a+b \text {sech}^{-1}(c x)\right )}{\left (d+e x^2\right )^3} \, dx=\text {Result too large to show} \]

[In]

Integrate[(x^2*(a + b*ArcSech[c*x]))/(d + e*x^2)^3,x]

[Out]

-1/4*(a*x)/(e*(d + e*x^2)^2) + (a*x)/(8*d*e*(d + e*x^2)) + (a*ArcTan[(Sqrt[e]*x)/Sqrt[d]])/(8*d^(3/2)*e^(3/2))
 + b*(((-1/16*I)*(((-I)*Sqrt[e]*Sqrt[(1 - c*x)/(1 + c*x)]*(1 + c*x))/(Sqrt[d]*(c^2*d + e)*((-I)*Sqrt[d] + Sqrt
[e]*x)) - ArcSech[c*x]/(Sqrt[e]*((-I)*Sqrt[d] + Sqrt[e]*x)^2) + Log[x]/(d*Sqrt[e]) - Log[1 + Sqrt[(1 - c*x)/(1
 + c*x)] + c*x*Sqrt[(1 - c*x)/(1 + c*x)]]/(d*Sqrt[e]) + ((2*c^2*d + e)*Log[(-4*d*Sqrt[e]*Sqrt[c^2*d + e]*(Sqrt
[e] - I*c^2*Sqrt[d]*x + Sqrt[c^2*d + e]*Sqrt[(1 - c*x)/(1 + c*x)] + c*Sqrt[c^2*d + e]*x*Sqrt[(1 - c*x)/(1 + c*
x)]))/((2*c^2*d + e)*((-I)*Sqrt[d] + Sqrt[e]*x))])/(d*(c^2*d + e)^(3/2))))/(Sqrt[d]*e) + ((I/16)*((I*Sqrt[e]*S
qrt[(1 - c*x)/(1 + c*x)]*(1 + c*x))/(Sqrt[d]*(c^2*d + e)*(I*Sqrt[d] + Sqrt[e]*x)) - ArcSech[c*x]/(Sqrt[e]*(I*S
qrt[d] + Sqrt[e]*x)^2) + Log[x]/(d*Sqrt[e]) - Log[1 + Sqrt[(1 - c*x)/(1 + c*x)] + c*x*Sqrt[(1 - c*x)/(1 + c*x)
]]/(d*Sqrt[e]) + ((2*c^2*d + e)*Log[(-4*d*Sqrt[e]*Sqrt[c^2*d + e]*(Sqrt[e] + I*c^2*Sqrt[d]*x + Sqrt[c^2*d + e]
*Sqrt[(1 - c*x)/(1 + c*x)] + c*Sqrt[c^2*d + e]*x*Sqrt[(1 - c*x)/(1 + c*x)]))/((2*c^2*d + e)*(I*Sqrt[d] + Sqrt[
e]*x))])/(d*(c^2*d + e)^(3/2))))/(Sqrt[d]*e) - (-(ArcSech[c*x]/(I*Sqrt[d]*Sqrt[e] + e*x)) + (I*(Log[x]/Sqrt[e]
 - Log[1 + Sqrt[(1 - c*x)/(1 + c*x)] + c*x*Sqrt[(1 - c*x)/(1 + c*x)]]/Sqrt[e] + Log[((2*I)*Sqrt[e]*(Sqrt[d]*Sq
rt[(1 - c*x)/(1 + c*x)]*(1 + c*x) + (Sqrt[d]*Sqrt[e] + I*c^2*d*x)/Sqrt[c^2*d + e]))/(I*Sqrt[d] + Sqrt[e]*x)]/S
qrt[c^2*d + e]))/Sqrt[d])/(16*d*e) - (-(ArcSech[c*x]/((-I)*Sqrt[d]*Sqrt[e] + e*x)) - (I*(Log[x]/Sqrt[e] - Log[
1 + Sqrt[(1 - c*x)/(1 + c*x)] + c*x*Sqrt[(1 - c*x)/(1 + c*x)]]/Sqrt[e] + Log[(2*Sqrt[e]*(I*Sqrt[d]*Sqrt[(1 - c
*x)/(1 + c*x)]*(1 + c*x) + (I*Sqrt[d]*Sqrt[e] + c^2*d*x)/Sqrt[c^2*d + e]))/((-I)*Sqrt[d] + Sqrt[e]*x)]/Sqrt[c^
2*d + e]))/Sqrt[d])/(16*d*e) - ((I/32)*(PolyLog[2, -E^(-2*ArcSech[c*x])] - 2*((-4*I)*ArcSin[Sqrt[1 + (I*Sqrt[e
])/(c*Sqrt[d])]/Sqrt[2]]*ArcTanh[((I*c*Sqrt[d] + Sqrt[e])*Tanh[ArcSech[c*x]/2])/Sqrt[c^2*d + e]] + ArcSech[c*x
]*Log[1 + E^(-2*ArcSech[c*x])] - ArcSech[c*x]*Log[1 + (I*(Sqrt[e] - Sqrt[c^2*d + e]))/(c*Sqrt[d]*E^ArcSech[c*x
])] + (2*I)*ArcSin[Sqrt[1 + (I*Sqrt[e])/(c*Sqrt[d])]/Sqrt[2]]*Log[1 + (I*(Sqrt[e] - Sqrt[c^2*d + e]))/(c*Sqrt[
d]*E^ArcSech[c*x])] - ArcSech[c*x]*Log[1 + (I*(Sqrt[e] + Sqrt[c^2*d + e]))/(c*Sqrt[d]*E^ArcSech[c*x])] - (2*I)
*ArcSin[Sqrt[1 + (I*Sqrt[e])/(c*Sqrt[d])]/Sqrt[2]]*Log[1 + (I*(Sqrt[e] + Sqrt[c^2*d + e]))/(c*Sqrt[d]*E^ArcSec
h[c*x])] + PolyLog[2, (I*(-Sqrt[e] + Sqrt[c^2*d + e]))/(c*Sqrt[d]*E^ArcSech[c*x])] + PolyLog[2, ((-I)*(Sqrt[e]
 + Sqrt[c^2*d + e]))/(c*Sqrt[d]*E^ArcSech[c*x])])))/(d^(3/2)*e^(3/2)) - ((I/32)*(-PolyLog[2, -E^(-2*ArcSech[c*
x])] + 2*((-4*I)*ArcSin[Sqrt[1 - (I*Sqrt[e])/(c*Sqrt[d])]/Sqrt[2]]*ArcTanh[(((-I)*c*Sqrt[d] + Sqrt[e])*Tanh[Ar
cSech[c*x]/2])/Sqrt[c^2*d + e]] + ArcSech[c*x]*Log[1 + E^(-2*ArcSech[c*x])] - ArcSech[c*x]*Log[1 + (I*(-Sqrt[e
] + Sqrt[c^2*d + e]))/(c*Sqrt[d]*E^ArcSech[c*x])] + (2*I)*ArcSin[Sqrt[1 - (I*Sqrt[e])/(c*Sqrt[d])]/Sqrt[2]]*Lo
g[1 + (I*(-Sqrt[e] + Sqrt[c^2*d + e]))/(c*Sqrt[d]*E^ArcSech[c*x])] - ArcSech[c*x]*Log[1 - (I*(Sqrt[e] + Sqrt[c
^2*d + e]))/(c*Sqrt[d]*E^ArcSech[c*x])] - (2*I)*ArcSin[Sqrt[1 - (I*Sqrt[e])/(c*Sqrt[d])]/Sqrt[2]]*Log[1 - (I*(
Sqrt[e] + Sqrt[c^2*d + e]))/(c*Sqrt[d]*E^ArcSech[c*x])] + PolyLog[2, ((-I)*(-Sqrt[e] + Sqrt[c^2*d + e]))/(c*Sq
rt[d]*E^ArcSech[c*x])] + PolyLog[2, (I*(Sqrt[e] + Sqrt[c^2*d + e]))/(c*Sqrt[d]*E^ArcSech[c*x])])))/(d^(3/2)*e^
(3/2)))

Maple [C] (warning: unable to verify)

Result contains higher order function than in optimal. Order 9 vs. order 4.

Time = 150.99 (sec) , antiderivative size = 1398, normalized size of antiderivative = 1.10

method result size
parts \(\text {Expression too large to display}\) \(1398\)
derivativedivides \(\text {Expression too large to display}\) \(1417\)
default \(\text {Expression too large to display}\) \(1417\)

[In]

int(x^2*(a+b*arcsech(c*x))/(e*x^2+d)^3,x,method=_RETURNVERBOSE)

[Out]

a*((1/8/d*x^3-1/8/e*x)/(e*x^2+d)^2+1/8/e/d/(d*e)^(1/2)*arctan(e*x/(d*e)^(1/2)))+b/c^3*(1/8*x*c^5*(c^4*d*e*arcs
ech(c*x)*x^2-d^2*c^4*arcsech(c*x)-(-(c*x-1)/c/x)^(1/2)*((c*x+1)/c/x)^(1/2)*e^2*c^3*x^3-(-(c*x-1)/c/x)^(1/2)*((
c*x+1)/c/x)^(1/2)*c^3*d*e*x+e^2*arcsech(c*x)*c^2*x^2-c^2*d*e*arcsech(c*x))/d/e/(c^2*d+e)/(c^2*e*x^2+c^2*d)^2-1
/16/d/(c^2*d+e)*c^4*sum(_R1/(_R1^2*c^2*d+c^2*d+2*e)*(arcsech(c*x)*ln((_R1-1/c/x-(-1+1/c/x)^(1/2)*(1+1/c/x)^(1/
2))/_R1)+dilog((_R1-1/c/x-(-1+1/c/x)^(1/2)*(1+1/c/x)^(1/2))/_R1)),_R1=RootOf(c^2*d*_Z^4+(2*c^2*d+4*e)*_Z^2+c^2
*d))-1/16/(c^2*d+e)/e*c^6*sum(_R1/(_R1^2*c^2*d+c^2*d+2*e)*(arcsech(c*x)*ln((_R1-1/c/x-(-1+1/c/x)^(1/2)*(1+1/c/
x)^(1/2))/_R1)+dilog((_R1-1/c/x-(-1+1/c/x)^(1/2)*(1+1/c/x)^(1/2))/_R1)),_R1=RootOf(c^2*d*_Z^4+(2*c^2*d+4*e)*_Z
^2+c^2*d))+1/16/d/(c^2*d+e)*c^4*sum(1/_R1/(_R1^2*c^2*d+c^2*d+2*e)*(arcsech(c*x)*ln((_R1-1/c/x-(-1+1/c/x)^(1/2)
*(1+1/c/x)^(1/2))/_R1)+dilog((_R1-1/c/x-(-1+1/c/x)^(1/2)*(1+1/c/x)^(1/2))/_R1)),_R1=RootOf(c^2*d*_Z^4+(2*c^2*d
+4*e)*_Z^2+c^2*d))+1/8*(-(c^2*d-2*(e*(c^2*d+e))^(1/2)+2*e)*d)^(1/2)*(c^2*d+2*(e*(c^2*d+e))^(1/2)+2*e)*c*arctan
h(c*d*(1/c/x+(-1+1/c/x)^(1/2)*(1+1/c/x)^(1/2))/((-c^2*d+2*(e*(c^2*d+e))^(1/2)-2*e)*d)^(1/2))/(c^2*d+e)/e/d^3-1
/8*(-(c^2*d-2*(e*(c^2*d+e))^(1/2)+2*e)*d)^(1/2)*(c^2*d*(e*(c^2*d+e))^(1/2)+2*c^2*d*e+2*e^2+2*(e*(c^2*d+e))^(1/
2)*e)*c*arctanh(c*d*(1/c/x+(-1+1/c/x)^(1/2)*(1+1/c/x)^(1/2))/((-c^2*d+2*(e*(c^2*d+e))^(1/2)-2*e)*d)^(1/2))/(c^
2*d+e)^2/e/d^3+1/8*((c^2*d+2*(e*(c^2*d+e))^(1/2)+2*e)*d)^(1/2)*(c^2*d-2*(e*(c^2*d+e))^(1/2)+2*e)*c*arctan(c*d*
(1/c/x+(-1+1/c/x)^(1/2)*(1+1/c/x)^(1/2))/((c^2*d+2*(e*(c^2*d+e))^(1/2)+2*e)*d)^(1/2))/(c^2*d+e)/e/d^3-1/8*((c^
2*d+2*(e*(c^2*d+e))^(1/2)+2*e)*d)^(1/2)*(-c^2*d*(e*(c^2*d+e))^(1/2)+2*c^2*d*e+2*e^2-2*(e*(c^2*d+e))^(1/2)*e)*c
*arctan(c*d*(1/c/x+(-1+1/c/x)^(1/2)*(1+1/c/x)^(1/2))/((c^2*d+2*(e*(c^2*d+e))^(1/2)+2*e)*d)^(1/2))/(c^2*d+e)^2/
e/d^3+1/16/(c^2*d+e)/e*c^6*sum(1/_R1/(_R1^2*c^2*d+c^2*d+2*e)*(arcsech(c*x)*ln((_R1-1/c/x-(-1+1/c/x)^(1/2)*(1+1
/c/x)^(1/2))/_R1)+dilog((_R1-1/c/x-(-1+1/c/x)^(1/2)*(1+1/c/x)^(1/2))/_R1)),_R1=RootOf(c^2*d*_Z^4+(2*c^2*d+4*e)
*_Z^2+c^2*d)))

Fricas [F]

\[ \int \frac {x^2 \left (a+b \text {sech}^{-1}(c x)\right )}{\left (d+e x^2\right )^3} \, dx=\int { \frac {{\left (b \operatorname {arsech}\left (c x\right ) + a\right )} x^{2}}{{\left (e x^{2} + d\right )}^{3}} \,d x } \]

[In]

integrate(x^2*(a+b*arcsech(c*x))/(e*x^2+d)^3,x, algorithm="fricas")

[Out]

integral((b*x^2*arcsech(c*x) + a*x^2)/(e^3*x^6 + 3*d*e^2*x^4 + 3*d^2*e*x^2 + d^3), x)

Sympy [F(-1)]

Timed out. \[ \int \frac {x^2 \left (a+b \text {sech}^{-1}(c x)\right )}{\left (d+e x^2\right )^3} \, dx=\text {Timed out} \]

[In]

integrate(x**2*(a+b*asech(c*x))/(e*x**2+d)**3,x)

[Out]

Timed out

Maxima [F(-2)]

Exception generated. \[ \int \frac {x^2 \left (a+b \text {sech}^{-1}(c x)\right )}{\left (d+e x^2\right )^3} \, dx=\text {Exception raised: ValueError} \]

[In]

integrate(x^2*(a+b*arcsech(c*x))/(e*x^2+d)^3,x, algorithm="maxima")

[Out]

Exception raised: ValueError >> Computation failed since Maxima requested additional constraints; using the 'a
ssume' command before evaluation *may* help (example of legal syntax is 'assume(e>0)', see `assume?` for more
details)Is e

Giac [F]

\[ \int \frac {x^2 \left (a+b \text {sech}^{-1}(c x)\right )}{\left (d+e x^2\right )^3} \, dx=\int { \frac {{\left (b \operatorname {arsech}\left (c x\right ) + a\right )} x^{2}}{{\left (e x^{2} + d\right )}^{3}} \,d x } \]

[In]

integrate(x^2*(a+b*arcsech(c*x))/(e*x^2+d)^3,x, algorithm="giac")

[Out]

integrate((b*arcsech(c*x) + a)*x^2/(e*x^2 + d)^3, x)

Mupad [F(-1)]

Timed out. \[ \int \frac {x^2 \left (a+b \text {sech}^{-1}(c x)\right )}{\left (d+e x^2\right )^3} \, dx=\int \frac {x^2\,\left (a+b\,\mathrm {acosh}\left (\frac {1}{c\,x}\right )\right )}{{\left (e\,x^2+d\right )}^3} \,d x \]

[In]

int((x^2*(a + b*acosh(1/(c*x))))/(d + e*x^2)^3,x)

[Out]

int((x^2*(a + b*acosh(1/(c*x))))/(d + e*x^2)^3, x)